﻿Imports System
Imports System.IO
Imports System.Runtime.Serialization
Imports System.Runtime.Serialization.Formatters.Binary
<Serializable()> Public Class AverageTimeBackCon
    Implements ICloneable
    ''' <summary>
    ''' 所有关心点的列表
    ''' </summary>
    ''' <remarks></remarks>
    Private m_ListCareBackCon As New List(Of DisCareBackCon)
    ''' <summary>
    ''' 平均浓度
    ''' </summary>
    ''' <remarks></remarks>
    Private m_AervaggeCon As Double
    ''' <summary>
    ''' 所有关心点的列表
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property ListCareBackCon() As List(Of DisCareBackCon)
        Get
            Return Me.m_ListCareBackCon
        End Get
        Set(ByVal value As List(Of DisCareBackCon))
            Me.m_ListCareBackCon = value
        End Set
    End Property
    ''' <summary>
    ''' 平均浓度
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property AervaggeCon() As Double
        Get
            Return Me.m_AervaggeCon
        End Get
        Set(ByVal value As Double)
            Me.m_AervaggeCon = value
        End Set
    End Property

    Public Function Clone() As Object Implements System.ICloneable.Clone
        Dim obj As New AverageTimeBackCon
        obj.m_AervaggeCon = Me.m_AervaggeCon
        For i As Integer = 0 To Me.m_ListCareBackCon.Count - 1
            obj.m_ListCareBackCon.Add(Me.m_ListCareBackCon(i).Clone)
        Next
        Return obj
    End Function
End Class
